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or Teletype Punch) 



1 . ABSTRACT 



This program provides a means of punching out information contdined in selected blocks of 
core memory as binary-coded paper tape using the high-speed or teletype punch. 

2. REQUIREMENTS 

2 . 1 Storage 

This program occupies 75 (decimal) core memofy locations. 

2.3 Equipment 

Basic PDP-8, 8/S, 8/1, 8/L with standard ASR'-SS or in addition standard PC03, PP8I, PP8L 
high-speed punch. 

3. USAGE 
/ 

3.1 Loading 

These programs are loaded by means of the BirtCiry Loader. See Binary Loader Document 
DEC-08-LBAA-D or Paper Tape System User's Guide DEC-08-NGCC-D for a complete discussion of 
the Binary Loader and its use, 

3.2 Calling Sequence 

None. This program cannot be called as a subroutine. 



3.3 Switch Seftings 

The switch register is used to enter initial and final addresses of blocks to be punched as well 
as the number of blocks to be punched. 

3.4 Start Up/Entry 

This program is used in the following manner. 

3.4.1 Assuming the program is in memory as listed in 7.1, place the starting address 7465 in the 
switch register and press the LOAD ADDRESS key. 

3.4.2 Press the START key. Leader will be punched and the computer will halt. Set the number of 
blocks to be punched into the switch register and press CONTINUE. 



3.4.3 The computer will halt. Set the initial address of the block to be punched into the switch 
register and press CONTINUE. 

3.4.4 The computer will halt. Set the final address of the block to be punched into the switch 
register and press CONTINUE. 

3.4.4.1 Note that the final address must be greater than the initial address. 

3.4.5 The indicated block of data will be punched. If only one block has been called for, the 
trailer will punch and the computer will halt. If more than one block has been called for, the compu- 
ter will halt at step 3.4.3 waiting for a new initial address. The second block will punch following 
completion of steps 3.4.3 and 3.4.4, etc. 

4. METHOD 

4.1 Discussion 

This is a basic program used to produce tapes acceptable by the Binary Loader (See 
DEC-08-LBAA-D or DEC-08-NGCC-D). 



Within each block, an initial address into which data is to be loaded is punched as the first 
two characters. Following the initial address, each 2-character group represents the binary contents 
of a computer word. At the end of each block, a 2-character checbum is punched. 

Reference to Section 8.1, Flow Chart, will illustrate the computational approach. Bosically 
data is picked up from memory, the most significant half shifted right and punched, and the least 
significant half masked out and punched. 

A similar process is followed with respect to the initial address and the checksum which is 
accumulated character by character as a block is punched. 

5. FORMAT 

5.1 External Data 

See DEC-08-LBAA-D or DEC-08-NGCC-D for a complete discussion of tape format. 

6. EXECUTION TIME 

This routine is output limited. 

7. PROGRAM 

7.1 Program Listing 

A listing of this program with BPUN located at 7465 is as follows: 



7514 


1770 


751 5 


7100 


7516 


2370 


7517 


5306 


7520 


2367 


752 1 


5275 


7522 


1366 


7523 


7100 


7524 


4341 


7525 


4330 


7526 


7402 


7527 


5265 


7530 


0000 


753 1 


7300 


7532 


1372 


7533 


3373 


7534 


1374 


7535 


4361 


7536 


2373 


7537 


5335 


7540 


5730 


7541 


0000 


7542 


3375 


7543 


13 "7 5 


7544 


70 1 2 


7545 


7012 


754 6 


7012 



PLOT^ 



BINP. 



TAD 


IIA 


CLL 




ISZ 


lA 


JMP 


PUNL 


ISZ 


NB 


JKP 


NXBL 


TAD 


CKSM 


CLL 




J MS 


BINP 


JMS 


PLOT 


HLT 




J MP 


BPUN 







CLA 


CLL 


TAD 


M212 


DCA 


CTRl 


TAD 


C200 


JMS 


PUN 


ISZ 


CTHl 


JMP 


.-2 


JMP 


1 PLOT 







DCA 


TEMl 


TAD 


TEMl 


RTk 




kTK 




kTR 





/GET WORD TO PUNCH 
/NOT AN ORIGIN 
/JUST INDEX lA 

/IS THERE ANOTHER BLOCK? 
/HANDLE NEXT BLOCK 



/GO PUNCH CHECK SUM 
/GO PUNCH TRAILER CODES 
/DONE 



/TO PUNCH 212 OCTAL LEADER 
TRAILER CODES 

/LEADER TRAILER CODE 

/PUNCH C (AC ) 

/ANOTHER L-T CODE OR NOT? 

/GO PUNCH ANOTHER 

/EXIT 



7465 
7466 
7467 
7470 
747 1 

7472 
7473 
7474 

747 5 



7300 
6026 
3366 
4330 
7402 

7604 
7041 
33 67 

7402 



747 6 


7604 


74 7 7 


33 70 


750 


7 402 


750 1 


7 604 


7502 


7001 


7503 


33 7 1 


7504 


13 70 


750 5 


7] 20 


7506 


434! 


7507 


1370 


7510 


7041 


751 1 


1371 


7512 


7650 


7513 


5320 



/BIN PUNCH HIGH SPEED PUNCH (PC03, PP8I, PPHL) 

*7465 

BPUf 

/INITIAL PUNCH 
/CLEAR CHECK-SU^; 
/GO PUN'CH LEADER CODES 
/SET SWITCHES = NU^•BER OF 
BLOCKS 



/STORE MINUS NUMBER OF 
BLOCKS 
NXBL> HLT /SET S W ITCHES = I N IT I AL ADDRESS 

OF BLOCK 



PUNL 



CLA 


CLL 


PLS 




DCA 


CKSM 


JMS 


PLOT 


HLT 




LAS 




CIA 




DCA 


NB 



LAS 




DCA 


lA 


HLT 




LAS 




lAC 




DCA 


FA 


TAD 


lA 


STL 




JMS 


BIN 


TAD 


lA 


CIA 




TAD 


FA 


SNA 


CLA 


JMP 


.+5 



/SET SWITCHES^ 
OF BLOCK 



F INAL ADDRlvSS 



/TO 

/GO 
OF 



PUNCH 
HUNCH 
TAPE 



lA AS ORIGIN 
WORD AS TWO LINES 



/AC=FA-IA 
/WAS IT LAST 
/IT WAS THE i 



WORD OF BLOCK? 
.AST WORD 



7547 

7550 
7551 
7552 
7553 
7554 

7555 
7556 
7557 
7560 
7561 
7562 
7563 
7564 
7565 
7566 
7567 
7570 
757 1 
7572 
7573 
7574 
7575 
7576 
7577 



0376 

4361 
1366 
3366 
1375 
0377 

4361 
1366 
3366 
5741 
00 00 
6021 
53 62 
6026 
5761 
0000 
0000 
0000 

mm 

7566 

0000 
0200 
0000 
0177 
0077 



AND SL 7 



PUN, 



NB, 

lA, 

FA, 

M212, 

CTRl , 

C200, 

TEMl , 

SL7, 

SL6, 



J MS 
TAD 
DCA 
TAD 
AND 

JMS 

TAD 

DCA 

J MP 



PSF 

J MP 

PLS 

J MP 









-212 



200 



177 

77 



PUN 

CKSM 

CKSM 

TEMl 

SL6 

PUN 
CKSM 
CKSM 
I BINP 



I PUN 



/FIKST TWO OCTAL DIGITS IN 
AC 5-11 
/PUNCH C (AC) 



/LAST TWO OCTAL DIGITS IN 
AC 6-11 
/PUNCH C (AC) 



/EXIT 

/ROUTINE TO PUNCH C (AC) 

/AND EXIT WITH C (AC) 

/UNALTERED 

/PUNCH IT 

/EXIT 



7.1.2 Teletype Punch 



To use this program with the ASR-33 Teletype moke the following changes: 



7466 



604 6 



TLS 

TbF 

tl::> 



/INITIAL PUNCH 
//livD L/, IT iJiTH C 
/i'U:vCH IT 



( /-.C ) 



8. DIAGRAM 

8.1 Flow Charf 

Nofe that in this diagram circles represent subroutine utilization not connecti 



PLOT I PUNCH LEADER 




